home *** CD-ROM | disk | FTP | other *** search
/ Developer CD Series 1999 April: Mac OS SDK / Dev.CD Apr 99 SDK1.toast / Development Kits / Interfaces&Libraries / Universal / Interfaces / AIncludes / Scrap.a < prev    next >
Encoding:
Text File  |  1998-08-17  |  2.5 KB  |  99 lines  |  [TEXT/MPS ]
  1. ;
  2. ;    File:        Scrap.a
  3. ;
  4. ;    Contains:    Scrap Manager Interfaces.
  5. ;
  6. ;    Version:    Technology:    System 7.5
  7. ;                Release:    Universal Interfaces 3.2
  8. ;
  9. ;    Copyright:    © 1985-1998 by Apple Computer, Inc., all rights reserved
  10. ;
  11. ;    Bugs?:        For bug reports, consult the following page on
  12. ;                the World Wide Web:
  13. ;
  14. ;                    http://developer.apple.com/bugreporter/
  15. ;
  16. ;
  17.     IF &TYPE('__SCRAP__') = 'UNDEFINED' THEN
  18. __SCRAP__ SET 1
  19.  
  20.     IF &TYPE('__MACTYPES__') = 'UNDEFINED' THEN
  21.     include 'MacTypes.a'
  22.     ENDIF
  23.  
  24.  
  25. ;  _________________________________________________________________________________________________________
  26. ;   • CLASSIC SCRAP MANAGER API
  27. ;  _________________________________________________________________________________________________________
  28.  
  29.  
  30.  
  31. ScrapStuff                RECORD 0
  32. scrapSize                 ds.l    1                ; offset: $0 (0)
  33. scrapHandle                 ds.l    1                ; offset: $4 (4)
  34. scrapCount                 ds.w    1                ; offset: $8 (8)
  35. scrapState                 ds.w    1                ; offset: $A (10)
  36. scrapName                 ds.l    1                ; offset: $C (12)
  37. sizeof                     EQU *                    ; size:   $10 (16)
  38.                         ENDR
  39. ; typedef struct ScrapStuff *            PScrapStuff
  40.  
  41. ; typedef struct ScrapStuff *            ScrapStuffPtr
  42.  
  43. ;
  44. ; pascal ScrapStuffPtr InfoScrap(void )
  45. ;
  46.     IF TARGET_OS_MAC ** TARGET_CPU_68K ** ¬ TARGET_RT_MAC_CFM THEN
  47.         _InfoScrap:    OPWORD    $A9F9
  48.     ELSEIF TARGET_OS_MAC ** TARGET_RT_MAC_CFM THEN
  49.         IMPORT_CFM_FUNCTION InfoScrap
  50.     ENDIF
  51.  
  52. ;
  53. ; pascal SInt32 UnloadScrap(void )
  54. ;
  55.     IF TARGET_OS_MAC ** TARGET_CPU_68K ** ¬ TARGET_RT_MAC_CFM THEN
  56.         _UnloadScrap:    OPWORD    $A9FA
  57.     ELSEIF TARGET_OS_MAC ** TARGET_RT_MAC_CFM THEN
  58.         IMPORT_CFM_FUNCTION UnloadScrap
  59.     ENDIF
  60.  
  61. ;
  62. ; pascal SInt32 LoadScrap(void )
  63. ;
  64.     IF TARGET_OS_MAC ** TARGET_CPU_68K ** ¬ TARGET_RT_MAC_CFM THEN
  65.         _LoadScrap:    OPWORD    $A9FB
  66.     ELSEIF TARGET_OS_MAC ** TARGET_RT_MAC_CFM THEN
  67.         IMPORT_CFM_FUNCTION LoadScrap
  68.     ENDIF
  69.  
  70. ;
  71. ; pascal SInt32 GetScrap(Handle hDest, ResType theType, SInt32 *offset)
  72. ;
  73.     IF TARGET_OS_MAC ** TARGET_CPU_68K ** ¬ TARGET_RT_MAC_CFM THEN
  74.         _GetScrap:    OPWORD    $A9FD
  75.     ELSEIF TARGET_OS_MAC ** TARGET_RT_MAC_CFM THEN
  76.         IMPORT_CFM_FUNCTION GetScrap
  77.     ENDIF
  78.  
  79. ;
  80. ; pascal SInt32 ZeroScrap(void )
  81. ;
  82.     IF TARGET_OS_MAC ** TARGET_CPU_68K ** ¬ TARGET_RT_MAC_CFM THEN
  83.         _ZeroScrap:    OPWORD    $A9FC
  84.     ELSEIF TARGET_OS_MAC ** TARGET_RT_MAC_CFM THEN
  85.         IMPORT_CFM_FUNCTION ZeroScrap
  86.     ENDIF
  87.  
  88. ;
  89. ; pascal SInt32 PutScrap(SInt32 length, ResType theType, const void *source)
  90. ;
  91.     IF TARGET_OS_MAC ** TARGET_CPU_68K ** ¬ TARGET_RT_MAC_CFM THEN
  92.         _PutScrap:    OPWORD    $A9FE
  93.     ELSEIF TARGET_OS_MAC ** TARGET_RT_MAC_CFM THEN
  94.         IMPORT_CFM_FUNCTION PutScrap
  95.     ENDIF
  96.  
  97.     ENDIF ; __SCRAP__ 
  98.  
  99.